// The NSpring Framework for .NET
// Copyright (c) 2003, Jeffrey Varszegi
// All rights reserved.
// 
// Redistribution and use in source and binary forms, with or without modification, 
// are permitted provided that the following conditions are met:
// 
// - Redistributions of source code must retain the above copyright notice, this 
// list of conditions and the following disclaimer.
// 
// - Redistributions in binary form must reproduce the above copyright notice, this 
// list of conditions and the following disclaimer in the documentation and/or other 
// materials provided with the distribution.
// 
// - Neither the name of the NSpring project nor the names of its contributors may 
// be used to endorse or promote products derived from this software without 
// specific prior written permission from the copyright owner.
// 
// - No product derived from this software may be called "NSpring", nor may 
// "NSpring" appear in the name of such a product, without specific prior written 
// permission from the copyright owner.
// 
// THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND 
// ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED 
// WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 
// IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, 
// INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, 
// BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 
// DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF 
// LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE 
// OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED 
// OF THE POSSIBILITY OF SUCH DAMAGE. 

namespace NSpring.Logging.Common.Pattern.Patterns {

using System;
using System.Text;

using NSpring.Logging;

/// <summary>
/// <para>
/// A pattern for constructing file paths.
/// All underlying pattern-related code is subject to change without warning
/// or deprecation, and should not be called directly by application code
/// </para>
/// </summary>
internal sealed class FilePathPattern : Pattern {
    private const string INVALID_FILE_PATH_CHARS        = ":*?\"<>|";

    private const char UNDERSCORE_CHAR                  = '_';
    private const char COLON_CHAR                       = ':';
    private const char ASTERISK_CHAR                    = '*';
    private const char QUESTION_MARK_CHAR               = '?';
    private const char QUOTE_CHAR                       = '"';
    private const char LESS_THAN_CHAR                   = '<';
    private const char GREATER_THAN_CHAR                = '>';
    private const char PIPE_CHAR                        = '|';
    private const char BACKSLASH_CHAR                   = '\\';
    private const char FORWARD_SLASH_CHAR               = '/';
    
    private const string BLANK_STRING                   = "";

    private bool isDirectoryPathStatic;
    private bool isDirectoryPathVolatile;
    private bool isFilePathStatic;
    private bool isFilePathVolatile;
    
    public FilePathPattern(string source) : base(source, true, true, false, false, false) {
        bool separatorSeen = false;
        isDirectoryPathStatic = true;
        isDirectoryPathVolatile = false;
        isFilePathStatic = true;
        isFilePathVolatile = false;
        Token token;
        for(int x = (tokens.Length - 1); x >= 0; x--) {
            token = tokens[x];
            switch (token.Type) {
                case TokenType.Text         : {
                    if ((token.Text.IndexOf(BACKSLASH_CHAR) >= 0) || (token.Text.IndexOf(FORWARD_SLASH_CHAR) > 0)) {
                        separatorSeen = true;
                    }
                    if (x > 0) {
                        token.Text = Escape(token.Text);
                    }
                    break;
                }
                case TokenType.Separator    : {
                    if (x > 0) {
                        token.Text = Escape(token.Text);
                    }
                    separatorSeen = true;
                    break;
                }
                case TokenType.ContextProperty : {
                    if (separatorSeen) {
                        isDirectoryPathStatic = false;
                    }
                    isFilePathStatic = false;
                    break;
                }
                case TokenType.EventProperty : {
                    if (separatorSeen) {
                        isDirectoryPathStatic = false;
                    }
                    isFilePathStatic = false;
                    switch (((EventPropertyToken)token).PropertyType) {
                        case EventPropertyType.ID           :
                        case EventPropertyType.Millisecond  :
                        case EventPropertyType.Time         :
                        case EventPropertyType.Timestamp    : {
                            if (separatorSeen) {
                                isDirectoryPathVolatile = true;
                            }
                            isFilePathVolatile = true;
                            break;
                        }
                    }
                    break;
                }
                default                     : {
                    if (separatorSeen) {
                        isDirectoryPathStatic = false;
                    }
                    break;
                }
            }
        }
        
    }
    
    public bool IsDirectoryPathStatic {
        get {
            return isDirectoryPathStatic;
        }
    }
    public bool IsDirectoryPathVolatile {
        get {
            return isDirectoryPathVolatile;
        }
    }
    
    public bool IsFilePathStatic {
        get {
            return isFilePathStatic;
        }
    }
    public bool IsFilePathVolatile {
        get {
            return isFilePathVolatile;
        }
    }
    
    public override string Format(Event e) {
        StringBuilder sb = new StringBuilder(80);
        Token token;
        bool lastTokenWasSeparator = false;
        string lastSeparator = null;
        for(int x = 0; x < tokens.Length; x++) {
            token = tokens[x];
            switch (token.Type) {
                case TokenType.Text                 : {
                    sb.Append(token.Text);
                    lastTokenWasSeparator = false;
                    break;
                }
                case TokenType.Separator            : {
                    if (!lastTokenWasSeparator) {
                        sb.Append(token.Text);
                        lastSeparator = token.Text;
                        lastTokenWasSeparator = true;
                    }
                    else if (!token.Text.Equals(lastSeparator)) {
                        sb.Append(token.Text);
                        lastSeparator = token.Text;
                    }
                    break;
                }
                case TokenType.ContextProperty     :
                case TokenType.EventProperty       : {
                    sb.Append(EscapeToken(token.Format(e)));
                    lastTokenWasSeparator = false;
                    break;
                }
            }
        }
        return sb.ToString();
    }
    
    public override void Format(Event e, StringBuilder sb) {
        Token token;
        bool lastTokenWasSeparator = false;
        string lastSeparator = null;
        for(int x = 0; x < tokens.Length; x++) {
            token = tokens[x];
            switch (token.Type) {
                case TokenType.Text                  : {
                    sb.Append(token.Text);
                    break;
                }
                case TokenType.Separator            : {
                    if (!lastTokenWasSeparator) {
                        sb.Append(token.Text);
                        lastSeparator = token.Text;
                        lastTokenWasSeparator = true;
                    }
                    else if (!token.Text.Equals(lastSeparator)) {
                        sb.Append(token.Text);
                        lastSeparator = token.Text;
                    }
                    break;
                }
                case TokenType.ContextProperty      : 
                case TokenType.EventProperty        : {
                    sb.Append(EscapeToken(token.Format(e)));
                    break;
                }
            }
        }
    }

    private static string Escape(string s) {
        for(int x = 0; x < INVALID_FILE_PATH_CHARS.Length; x++) {
            if (s.IndexOf(INVALID_FILE_PATH_CHARS[x]) >= 0) {
                s = s.Replace(INVALID_FILE_PATH_CHARS[x], UNDERSCORE_CHAR);
            }
        }
        return s;
    }
    
    private static string EscapeToken(string s) {
        if (s.IndexOf(COLON_CHAR) >= 0)         {   s = s.Replace(COLON_CHAR, UNDERSCORE_CHAR); }
        if (s.IndexOf(ASTERISK_CHAR) >= 0)      {   s = s.Replace(ASTERISK_CHAR, UNDERSCORE_CHAR); }
        if (s.IndexOf(QUESTION_MARK_CHAR) >= 0) {   s = s.Replace(QUESTION_MARK_CHAR, UNDERSCORE_CHAR); }
        if (s.IndexOf(QUOTE_CHAR) >= 0)         {   s = s.Replace(QUOTE_CHAR, UNDERSCORE_CHAR); }
        if (s.IndexOf(LESS_THAN_CHAR) >= 0)     {   s = s.Replace(LESS_THAN_CHAR, UNDERSCORE_CHAR); }
        if (s.IndexOf(PIPE_CHAR) >= 0)          {   s = s.Replace(PIPE_CHAR, UNDERSCORE_CHAR); }
        if (s.IndexOf(BACKSLASH_CHAR) >= 0)     {   s = s.Replace(BACKSLASH_CHAR, UNDERSCORE_CHAR); }
        if (s.IndexOf(FORWARD_SLASH_CHAR) >= 0) {   s = s.Replace(FORWARD_SLASH_CHAR, UNDERSCORE_CHAR); }
        return s;
    }
}

}
